/ Apple Service Source 1997 December / Service Source v2.5 Companion 1.iso / Macintosh / Utilities / Macintosh Tutorial / Tutorial Items / Shared Cast / Shared Cast.rsrc / VWCI_1355

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 00 00 10 01 c4 20 80 | 00 00 00 02 00 00 00 00 |...... .|........|
|00000010| 00 05 00 00 00 00 00 00 | 01 a3 00 00 01 ac 00 00 |........|........|
|00000020| 01 ac 00 00 01 ac 00 00 | 01 ac 6f 6e 20 6d 6f 75 |........|..on mou|
|00000030| 73 65 44 6f 77 6e 0d 20 | 20 67 6c 6f 62 61 6c 20 |seDown. | global |
|00000040| 4c 65 61 72 6e 69 6e 67 | 42 61 73 69 63 73 46 72 |Learning|BasicsFr|
|00000050| 61 6d 65 0d 20 20 2d 2d | 20 32 30 20 3d 20 74 68 |ame.  --| 20 = th|
|00000060| 65 20 73 70 72 69 74 65 | 20 6f 66 20 74 68 65 20 |e sprite| of the |
|00000070| 72 69 67 68 74 20 62 75 | 74 74 6f 6e 0d 20 20 2d |right bu|tton.  -|
|00000080| 2d 20 66 32 33 20 3d 20 | 4c 65 74 4d 65 2e 55 70 |- f23 = |LetMe.Up|
|00000090| 20 62 75 74 74 6f 6e 0d | 20 20 2d 2d 20 66 32 34 | button.|  -- f24|
|000000a0| 20 3d 20 4c 65 74 4d 65 | 2e 44 6f 77 6e 20 62 75 | = LetMe|.Down bu|
|000000b0| 74 74 6f 6e 0d 20 20 69 | 66 20 62 75 74 74 6f 6e |tton.  i|f button|
|000000c0| 44 6f 77 6e 28 32 30 2c | 66 32 33 2c 66 32 34 2c |Down(20,|f23,f24,|
|000000d0| 54 52 55 45 29 20 74 68 | 65 6e 0d 20 20 20 20 69 |TRUE) th|en.    i|
|000000e0| 66 20 6d 61 72 6b 65 72 | 28 30 29 20 3d 20 6c 61 |f marker|(0) = la|
|000000f0| 62 65 6c 28 22 54 68 65 | 20 45 6e 64 22 29 20 74 |bel("The| End") t|
|00000100| 68 65 6e 0d 20 20 20 20 | 20 20 67 6f 20 74 6f 20 |hen.    |  go to |
|00000110| 66 72 61 6d 65 20 22 43 | 72 65 64 41 22 20 2d 2d |frame "C|redA" --|
|00000120| 20 71 75 69 74 73 20 74 | 68 65 20 74 6f 75 72 0d | quits t|he tour.|
|00000130| 20 20 20 20 65 6c 73 65 | 0d 20 20 20 20 20 20 70 |    else|.      p|
|00000140| 75 74 20 6d 61 72 6b 65 | 72 28 30 29 20 69 6e 74 |ut marke|r(0) int|
|00000150| 6f 20 4c 65 61 72 6e 69 | 6e 67 42 61 73 69 63 73 |o Learni|ngBasics|
|00000160| 46 72 61 6d 65 0d 20 20 | 20 20 20 20 77 68 65 6e |Frame.  |    when|
|00000170| 20 74 69 6d 65 4f 75 74 | 20 74 68 65 6e 20 6e 6f | timeOut| then no|
|00000180| 74 68 69 6e 67 20 20 0d | 20 20 20 20 20 20 67 6f |thing  .|      go|
|00000190| 20 74 6f 20 22 43 68 6f | 69 63 65 73 22 0d 20 20 | to "Cho|ices".  |
|000001a0| 20 20 65 6e 64 20 69 66 | 0d 20 20 65 6c 73 65 20 |  end if|.  else |
|000001b0| 67 6f 20 74 6f 20 74 68 | 65 20 66 72 61 6d 65 0d |go to th|e frame.|
|000001c0| 65 6e 64 20 6d 6f 75 73 | 65 44 6f 77 6e 08 4c 65 |end mous|eDown.Le|
|000001d0| 74 4d 65 2e 55 70       |                         |tMe.Up  |        |
+--------+-------------------------+-------------------------+--------+--------+